<?php

/**
 * Smarty Internal Plugin Data
 *
 * This file contains the basic classes and methodes for template and variable creation
 *
 * @package Smarty
 * @subpackage Templates
 * @author Uwe Tews
 */

/**
 * Base class with template and variable methodes
 */
class Smarty_Internal_Data {
	// class used for templates
	public $template_class = 'Smarty_Internal_Template';
	
	/**
	 * assigns a Smarty variable
	 *
	 * @param array $ |string $tpl_var the template variable name(s)
	 * @param mixed $value the value to assign
	 * @param boolean $nocache if true any output of this variable will be not cached
	 * @param boolean $scope the scope the variable will have  (local,parent or root)
	 */
	public function assign($tpl_var, $value = null, $nocache = false) {
		if (is_array ( $tpl_var )) {
			foreach ( $tpl_var as $_key => $_val ) {
				if ($_key != '') {
					$this->tpl_vars [$_key] = new Smarty_variable ( $_val, $nocache );
				}
			}
		} else {
			if ($tpl_var != '') {
				$this->tpl_vars [$tpl_var] = new Smarty_variable ( $value, $nocache );
			}
		}
	}
	/**
	 * assigns a global Smarty variable
	 *
	 * @param string $varname the global variable name
	 * @param mixed $value the value to assign
	 * @param boolean $nocache if true any output of this variable will be not cached
	 */
	public function assignGlobal($varname, $value = null, $nocache = false) {
		if ($varname != '') {
			Smarty::$global_tpl_vars [$varname] = new Smarty_variable ( $value, $nocache );
		}
	}
	/**
	 * assigns values to template variables by reference
	 *
	 * @param string $tpl_var the template variable name
	 * @param mixed $ &$value the referenced value to assign
	 * @param boolean $nocache if true any output of this variable will be not cached
	 */
	public function assignByRef($tpl_var, &$value, $nocache = false) {
		if ($tpl_var != '') {
			$this->tpl_vars [$tpl_var] = new Smarty_variable ( null, $nocache );
			$this->tpl_vars [$tpl_var]->value = &$value;
		}
	}
	
	/**
	 * wrapper function for Smarty 2 BC
	 *
	 * @param string $tpl_var the template variable name
	 * @param mixed $ &$value the referenced value to assign
	 */
	public function assign_by_ref($tpl_var, &$value) {
		if ($this->smarty->deprecation_notices)
			trigger_error ( "function call 'assign_by_ref' is unknown or deprecated, use 'assignByRef'", E_USER_NOTICE );
		$this->assignByRef ( $tpl_var, $value );
	}
	/**
	 * appends values to template variables
	 *
	 * @param array $ |string $tpl_var the template variable name(s)
	 * @param mixed $value the value to append
	 * @param boolean $merge flag if array elements shall be merged
	 * @param boolean $nocache if true any output of this variable will be not cached
	 */
	public function append($tpl_var, $value = null, $merge = false, $nocache = false) {
		if (is_array ( $tpl_var )) {
			// $tpl_var is an array, ignore $value
			foreach ( $tpl_var as $_key => $_val ) {
				if ($_key != '') {
					if (! isset ( $this->tpl_vars [$_key] )) {
						$tpl_var_inst = $this->getVariable ( $_key, null, true, false );
						if ($tpl_var_inst instanceof Undefined_Smarty_Variable) {
							$this->tpl_vars [$_key] = new Smarty_variable ( null, $nocache );
						} else {
							$this->tpl_vars [$_key] = clone $tpl_var_inst;
						}
					}
					if (! (is_array ( $this->tpl_vars [$_key]->value ) || $this->tpl_vars [$_key]->value instanceof ArrayAccess)) {
						settype ( $this->tpl_vars [$_key]->value, 'array' );
					}
					if ($merge && is_array ( $_val )) {
						foreach ( $_val as $_mkey => $_mval ) {
							$this->tpl_vars [$_key]->value [$_mkey] = $_mval;
						}
					} else {
						$this->tpl_vars [$_key]->value [] = $_val;
					}
				}
			}
		} else {
			if ($tpl_var != '' && isset ( $value )) {
				if (! isset ( $this->tpl_vars [$tpl_var] )) {
					$tpl_var_inst = $this->getVariable ( $tpl_var, null, true, false );
					if ($tpl_var_inst instanceof Undefined_Smarty_Variable) {
						$this->tpl_vars [$tpl_var] = new Smarty_variable ( null, $nocache );
					} else {
						$this->tpl_vars [$tpl_var] = clone $tpl_var_inst;
					}
				}
				if (! (is_array ( $this->tpl_vars [$tpl_var]->value ) || $this->tpl_vars [$tpl_var]->value instanceof ArrayAccess)) {
					settype ( $this->tpl_vars [$tpl_var]->value, 'array' );
				}
				if ($merge && is_array ( $value )) {
					foreach ( $value as $_mkey => $_mval ) {
						$this->tpl_vars [$tpl_var]->value [$_mkey] = $_mval;
					}
				} else {
					$this->tpl_vars [$tpl_var]->value [] = $value;
				}
			}
		}
	}
	
	/**
	 * appends values to template variables by reference
	 *
	 * @param string $tpl_var the template variable name
	 * @param mixed $ &$value the referenced value to append
	 * @param boolean $merge flag if array elements shall be merged
	 */
	public function appendByRef($tpl_var, &$value, $merge = false) {
		if ($tpl_var != '' && isset ( $value )) {
			if (! isset ( $this->tpl_vars [$tpl_var] )) {
				$this->tpl_vars [$tpl_var] = new Smarty_variable ();
			}
			if (! @is_array ( $this->tpl_vars [$tpl_var]->value )) {
				settype ( $this->tpl_vars [$tpl_var]->value, 'array' );
			}
			if ($merge && is_array ( $value )) {
				foreach ( $value as $_key => $_val ) {
					$this->tpl_vars [$tpl_var]->value [$_key] = &$value [$_key];
				}
			} else {
				$this->tpl_vars [$tpl_var]->value [] = &$value;
			}
		}
	}
	
	/**
	 *
	 * @param string $tpl_var the template variable name
	 * @param mixed $ &$value the referenced value to append
	 * @param boolean $merge flag if array elements shall be merged
	 */
	public function append_by_ref($tpl_var, &$value, $merge = false) {
		if ($this->smarty->deprecation_notices)
			trigger_error ( "function call 'append_by_ref' is unknown or deprecated, use 'appendByRef'", E_USER_NOTICE );
		$this->appendByRef ( $tpl_var, $value, $merge );
	}
	/**
	 * Returns a single or all template variables
	 *
	 * @param string $varname variable name or null
	 * @return string variable value or or array of variables
	 */
	function getTemplateVars($varname = null, $_ptr = null, $search_parents = true) {
		if (isset ( $varname )) {
			$_var = $this->getVariable ( $varname, $_ptr, $search_parents, false );
			if (is_object ( $_var )) {
				return $_var->value;
			} else {
				return null;
			}
		} else {
			$_result = array ();
			if ($_ptr === null) {
				$_ptr = $this;
			}
			while ( $_ptr !== null ) {
				foreach ( $_ptr->tpl_vars as $key => $var ) {
					if (! array_key_exists ( $key, $_result )) {
						$_result [$key] = $var->value;
					}
				}
				// not found, try at parent
				if ($search_parents) {
					$_ptr = $_ptr->parent;
				} else {
					$_ptr = null;
				}
			}
			if ($search_parents && isset ( Smarty::$global_tpl_vars )) {
				foreach ( Smarty::$global_tpl_vars as $key => $var ) {
					if (! array_key_exists ( $key, $_result )) {
						$_result [$key] = $var->value;
					}
				}
			}
			return $_result;
		}
	}
	
	/**
	 * clear the given assigned template variable.
	 *
	 * @param string $ |array $tpl_var the template variable(s) to clear
	 */
	public function clearAssign($tpl_var) {
		if (is_array ( $tpl_var )) {
			foreach ( $tpl_var as $curr_var ) {
				unset ( $this->tpl_vars [$curr_var] );
			}
		} else {
			unset ( $this->tpl_vars [$tpl_var] );
		}
	}
	
	/**
	 * clear all the assigned template variables.
	 */
	public function clearAllAssign() {
		$this->tpl_vars = array ();
	}
	
	/**
	 * load a config file, optionally load just selected sections
	 *
	 * @param string $config_file filename
	 * @param mixed $sections array of section names, single section or null
	 */
	public function configLoad($config_file, $sections = null) {
		// load Config class
		$config = new Smarty_Internal_Config ( $config_file, $this->smarty, $this );
		$config->loadConfigVars ( $sections );
	}
	
	/**
	 * gets the object of a Smarty variable
	 *
	 * @param string $variable the name of the Smarty variable
	 * @param object $_ptr optional pointer to data object
	 * @param boolean $search_parents search also in parent data
	 * @return object the object of the variable
	 */
	public function getVariable($_variable, $_ptr = null, $search_parents = true, $error_enable = true) {
		if ($_ptr === null) {
			$_ptr = $this;
		}
		while ( $_ptr !== null ) {
			if (isset ( $_ptr->tpl_vars [$_variable] )) {
				// found it, return it
				return $_ptr->tpl_vars [$_variable];
			}
			// not found, try at parent
			if ($search_parents) {
				$_ptr = $_ptr->parent;
			} else {
				$_ptr = null;
			}
		}
		if (isset ( Smarty::$global_tpl_vars [$_variable] )) {
			// found it, return it
			return Smarty::$global_tpl_vars [$_variable];
		}
		if ($this->smarty->error_unassigned && $error_enable) {
			throw new SmartyException ( 'Undefined Smarty variable "' . $_variable . '"' );
		} else {
			if ($error_enable) {
				// force a notice
				$x = $$_variable;
			}
			return new Undefined_Smarty_Variable ();
		}
	}
	/**
	 * gets  a config variable
	 *
	 * @param string $variable the name of the config variable
	 * @return mixed the value of the config variable
	 */
	public function getConfigVariable($_variable) {
		$_ptr = $this;
		while ( $_ptr !== null ) {
			if (isset ( $_ptr->config_vars [$_variable] )) {
				// found it, return it
				return $_ptr->config_vars [$_variable];
			}
			// not found, try at parent
			$_ptr = $_ptr->parent;
		}
		if ($this->smarty->error_unassigned) {
			throw new SmartyException ( 'Undefined config variable "' . $_variable . '"' );
		} else {
			// force a notice
			$x = $$_variable;
			return null;
		}
	}
	
	/**
	 * gets  a stream variable
	 *
	 * @param string $variable the stream of the variable
	 * @return mixed the value of the stream variable
	 */
	public function getStreamVariable($variable) {
		$_result = '';
		if ($fp = fopen ( $variable, 'r+' )) {
			while ( ! feof ( $fp ) && ($current_line = fgets ( $fp )) !== false ) {
				$_result .= $current_line;
			}
			fclose ( $fp );
			return $_result;
		}
		
		if ($this->smarty->error_unassigned) {
			throw new SmartyException ( 'Undefined stream variable "' . $variable . '"' );
		} else {
			return null;
		}
	}
	
	/**
	 * Returns a single or all config variables
	 *
	 * @param string $varname variable name or null
	 * @return string variable value or or array of variables
	 */
	function getConfigVars($varname = null, $search_parents = true) {
		//   	var_dump($this);
		$_ptr = $this;
		$var_array = array ();
		while ( $_ptr !== null ) {
			if (isset ( $varname )) {
				if (isset ( $_ptr->config_vars [$varname] )) {
					return $_ptr->config_vars [$varname];
				}
			} else {
				$var_array = array_merge ( $_ptr->config_vars, $var_array );
			}
			// not found, try at parent
			if ($search_parents) {
				$_ptr = $_ptr->parent;
			} else {
				$_ptr = null;
			}
		}
		if (isset ( $varname )) {
			return '';
		} else {
			return $var_array;
		}
	}
	
	/**
	 * Deassigns a single or all config variables
	 *
	 * @param string $varname variable name or null
	 */
	function clearConfig($varname = null) {
		if (isset ( $varname )) {
			unset ( $this->config_vars [$varname] );
			return;
		} else {
			$this->config_vars = array ();
			return;
		}
	}

}

/**
 * class for the Smarty data object
 *
 * The Smarty data object will hold Smarty variables in the current scope
 *
 * @param object $parent tpl_vars next higher level of Smarty variables
 */
class Smarty_Data extends Smarty_Internal_Data {
	// array of variable objects
	public $tpl_vars = array ();
	// back pointer to parent object
	public $parent = null;
	// config vars
	public $config_vars = array ();
	// Smarty object
	public $smarty = null;
	/**
	 * create Smarty data object
	 */
	public function __construct($_parent = null, $smarty = null) {
		$this->smarty = $smarty;
		if (is_object ( $_parent )) {
			// when object set up back pointer
			$this->parent = $_parent;
		} elseif (is_array ( $_parent )) {
			// set up variable values
			foreach ( $_parent as $_key => $_val ) {
				$this->tpl_vars [$_key] = new Smarty_variable ( $_val );
			}
		} elseif ($_parent != null) {
			throw new SmartyException ( "Wrong type for template variables" );
		}
	}
}
/**
 * class for the Smarty variable object
 *
 * This class defines the Smarty variable object
 */
class Smarty_Variable {
	// template variable
	public $value;
	public $nocache;
	public $scope;
	/**
	 * create Smarty variable object
	 *
	 * @param mixed $value the value to assign
	 * @param boolean $nocache if true any output of this variable will be not cached
	 * @param boolean $scope the scope the variable will have  (local,parent or root)
	 */
	public function __construct($value = null, $nocache = false, $scope = Smarty::SCOPE_LOCAL) {
		$this->value = $value;
		$this->nocache = $nocache;
		$this->scope = $scope;
	}
	
	public function __toString() {
		return $this->value;
	}
}

/**
 * class for undefined variable object
 *
 * This class defines an object for undefined variable handling
 */
class Undefined_Smarty_Variable {
	// return always false
	public function __get($name) {
		if ($name == 'nocache') {
			return false;
		} else {
			return null;
		}
	}
}

?>